#!/usr/bin/perl -w

# Various steps to perform a migration. Exit codes:
# 0  - step completed
# 1  - general failure
# 2  - migration to destination failed
# 99 - migration not supported
#
# Arguments:
# Srchst Desthst Machine Action
#
# Actions supported (in the expected order of execution):
# prepare_remote
#       Ran on destination host to run any commands to prepare for
#       the live migration..
# perform_migrate
#       Actually migrate. Ran on the existing live node.
#
$srcnode=$ARGV[0];
$destnode=$ARGV[1];
$appname=$ARGV[2];
$action=$ARGV[3];

exit(1); # virsh machine does not support live migration as yet.

